home *** CD-ROM | disk | FTP | other *** search
/ Aminet 15 / Aminet 15 - Nov 1996.iso / Aminet / dev / lang / perl_src.lha / fsf / perl / hints / linux.sh < prev    next >
Encoding:
Text File  |  1996-06-25  |  4.9 KB  |  164 lines
  1. # hints/linux.sh
  2. # Original version by rsanders
  3. # Additional support by Kenneth Albanowski <kjahds@kjahds.com>
  4. #
  5. # ELF support by H.J. Lu <hjl@nynexst.com>
  6. # Additional info from Nigel Head <nhead@ESOC.bitnet>
  7. # and Kenneth Albanowski <kjahds@kjahds.com>
  8. #
  9. # Consolidated by Andy Dougherty <doughera@lafcol.lafayette.edu>
  10. #
  11. # Updated Thu Feb  8 11:56:10 EST 1996
  12.  
  13. # Updated Thu May 30 10:50:22 EDT 1996 by <doughera@lafcol.lafayette.edu>
  14.  
  15. # Updated Fri Jun 21 11:07:54 EDT 1996
  16. # NDBM support for ELF renabled by <kjahds@kjahds.com>
  17.  
  18. # perl goes into the /usr tree.  See the Filesystem Standard
  19. # available via anonymous FTP at tsx-11.mit.edu in
  20. # /pub/linux/docs/linux-standards/fsstnd.
  21. # Allow a command line override, e.g. Configure -Dprefix=/foo/bar
  22. case "$prefix" in
  23. '') prefix='/usr' ;;
  24. esac
  25.  
  26. # gcc-2.6.3 defines _G_HAVE_BOOL to 1, but doesn't actually supply bool.
  27. ccflags="-Dbool=char -DHAS_BOOL $ccflags"
  28.  
  29. # BSD compatability library no longer needed
  30. set `echo X "$libswanted "| sed -e 's/ bsd / /'`
  31. shift
  32. libswanted="$*"
  33.  
  34. # Configure may fail to find lstat() since it's a static/inline
  35. # function in <sys/stat.h>.
  36. d_lstat=define
  37.  
  38. # Explanation?
  39. case "$usemymalloc" in
  40. '') usemymalloc='n' ;;
  41. esac
  42.  
  43. case "$optimize" in
  44. '') optimize='-O2' ;;
  45. esac
  46.  
  47. # Are we using ELF?  Thanks to Kenneth Albanowski <kjahds@kjahds.com>
  48. # for this test.
  49. cat >try.c <<'EOM'
  50. /* Test for whether ELF binaries are produced */
  51. #include <fcntl.h>
  52. #include <stdlib.h>
  53. main() {
  54.     char buffer[4];
  55.     int i=open("a.out",O_RDONLY);
  56.     if(i==-1)
  57.         exit(1); /* fail */
  58.     if(read(i,&buffer[0],4)<4)
  59.         exit(1); /* fail */
  60.     if(buffer[0] != 127 || buffer[1] != 'E' ||
  61.            buffer[2] != 'L' || buffer[3] != 'F')
  62.         exit(1); /* fail */
  63.     exit(0); /* succeed (yes, it's ELF) */
  64. }
  65. EOM
  66. if ${cc:-gcc} try.c >/dev/null 2>&1 && ./a.out; then
  67.     cat <<'EOM' >&4
  68.  
  69. You appear to have ELF support.  I'll try to use it for dynamic loading.
  70. If dynamic loading doesn't work, read hints/linux.sh for further information.
  71. EOM
  72.  
  73. #For RedHat Linux 3.0.3, you may need to fetch
  74. # ftp://ftp.redhat.com/pub/redhat-3.0.3/i386/updates/RPMS/ld.so-1.7.14-3.i386.rpm
  75. #
  76.  
  77. else
  78.     cat <<'EOM' >&4
  79.  
  80. You don't have an ELF gcc.  I will use dld if possible.  If you are
  81. using a version of DLD earlier than 3.2.6, or don't have it at all, you
  82. should probably upgrade. If you are forced to use 3.2.4, you should
  83. uncomment a couple of lines in hints/linux.sh and restart Configure so
  84. that shared libraries will be disallowed.
  85.  
  86. EOM
  87.     lddlflags="-r $lddlflags"
  88.     # These empty values are so that Configure doesn't put in the
  89.     # Linux ELF values.
  90.     ccdlflags=' '
  91.     cccdlflags=' '
  92.     ccflags="-DOVR_DBL_DIG=14 $ccflags"
  93.     so='sa'
  94.     dlext='o'
  95.     nm_so_opt=' '
  96.     ## If you are using DLD 3.2.4 which does not support shared libs,
  97.     ## uncomment the next two lines:
  98.     #ldflags="-static"
  99.     #so='none'
  100.  
  101.     # In addition, on some systems there is a problem with perl and NDBM
  102.     # which causes AnyDBM and NDBM_File to lock up. This is evidenced 
  103.     # in the tests as AnyDBM just freezing.  Apparently, this only 
  104.     # happens on a.out systems, so we disable NDBM for all a.out linux
  105.     # systems.  If someone can suggest a more robust test
  106.     #  that would be appreciated.
  107.     #
  108.     # More info:
  109.     # Date: Wed, 7 Feb 1996 03:21:04 +0900
  110.     # From: Jeffrey Friedl <jfriedl@nff.ncl.omron.co.jp>
  111.     #
  112.     # I tried compiling with DBM support and sure enough things locked up
  113.     # just as advertised. Checking into it, I found that the lockup was
  114.     # during the call to dbm_open. Not *in* dbm_open -- but between the call
  115.     # to and the jump into.
  116.     # 
  117.     # To make a long story short, making sure that the *.a and *.sa pairs of
  118.     #   /usr/lib/lib{m,db,gdbm}.{a,sa}
  119.     # were perfectly in sync took care of it.
  120.     #
  121.     # This will generate a harmless Whoa There! message
  122.     case "$d_dbm_open" in
  123.     '')    cat <<'EOM' >&4
  124.  
  125. Disabling ndbm.  This will generate a Whoa There message in Configure.
  126. Read hints/linux.sh for further information.
  127. EOM
  128.         # You can override this with Configure -Dd_dbm_open
  129.         d_dbm_open=undef
  130.         ;;
  131.     esac
  132. fi
  133.  
  134. rm -f try.c a.out
  135.  
  136. if /bin/bash -c exit; then
  137.   echo
  138.   echo You appear to have a working bash. Good.
  139. else
  140.   cat << 'EOM' >&4
  141.  
  142. *********************** Warning! *********************
  143. It would appear you have a defective bash shell installed. This is likely to
  144. give you a failure of op/exec test #5 during the test phase of the build,
  145. Upgrading to a recent version (1.14.4 or later) should fix the problem.
  146. ******************************************************
  147. EOM
  148.  
  149. fi
  150.  
  151. # Avoid some troublesome gcvt() functions.  With some libc versions, 
  152. # perl -e '$x=1e5; print "$x\n";' prints 1e+5.  We'd like it
  153. # to print 100000 instead, consistent with the integer value given
  154. # on other platforms.  This isn't a bug in gcvt, really; more in our
  155. # expectations for it.  We'd like it to behave exactly as
  156. # sprintf %.16g, but it isn't documented to do that.
  157. #
  158. # We'll use sprintf() instead, since we can control the output more
  159. # precisely.
  160. # 
  161. # The next version of Configure will check for this automatically.
  162. d_Gconvert='sprintf((b),"%.*g",(n),(x))'
  163.  
  164.